10 REM FLASHER 64 DEMO
15 PRINT"[147]"
20 POKE53280,0:POKE53281,0
30 IFL=0THENL=1:LOAD"FLASHER 64.ML",8,1
40 SYS52224:REM TURN ON FLASHER 64
50 :
60 PRINTCHR$(147);:REM CLEARS SCREENS
70 PRINT"           [158]DEMO OF FLASHER 64"
80 PRINT
90 PRINT"USE THE COMMAND: PRINTCHR$(15)  TO TURN ON FLASHING"
100 PRINT"[159]EG:[146]  PRINTCHR$(15)"CHR$(34)"FLASHER NOW ON"CHR$(34)
110 PRINTCHR$(15)"FLASHER NOW ON":REM COMMAND TO TURN ON FLASHING
120 FORD=1TO6000:NEXT
130 PRINT:PRINT"USE THE COMMAND: PRINTCHR$(143)  TO TURN OFF FLASHING."
140 PRINT"[159]EG:[146]  PRINTCHR$(15)"CHR$(34)"FLASH ON"CHR$(34)"CHR$(143)"CHR$(34);
150 PRINT" FLASH OFF"CHR$(34)"
160 [153][199](15)"FLASH ON"[199](143)" FLASH OFF"
170 [129]D[178]1[164]6000:[130]:[143] DELAY LOOP
180 [153]:[153]"USE THE COMMAND: PRINTCHR$(15)"[199](34)"SINSINSINSINSINSINSIN"[199](34);
190 [153]"TO TURN OFF A FLASHING WORD."
200 [153]:[153]"OPENEG:WAIT  PRINTCHR$(15)"[199](34)"FLASH ON"[199](34):[153]
210 [153][199](15)"FLASH ON"
220 [129]D[178]1[164]3000:[130]:[143] DELAY LOOP
230 [153]:[153]"OPENEG:WAIT  PRINTCHR$(15)"[199](34)"SINSINSINSINSINSINSIN"[199](34);
240 [153]"TO TURN OFF A FLASHING WORD."
250 [143] IFPEEK(146)<>1THEN140:PEEK THIS LOCATION FOR ON OR OFF CYCLE
260 [143] IF PEEK(146)=1 THEN CHARACTERS ARE ON SCREEN
270 [143] IF PEEK(146)=0 THEN CHARACTERS ARE OFF SCREEN
280 :
290 [139][194](146)[179][177]1[167]250:[143] ^
300 [153]"ONONONON";:[143] MOVE UP TO WORD
310 [153][199](15)"SINSINSINSINSINSINSINSIN"
320 [129]D[178]1[164]6000:[130]:[143] DELAY LOOP
330 [153]:[153]:[153]
340 [153]"SCROLL FLASHING CHARACTERS OFF SCREEN"
350 [129]X[178]1[164]24:[129]D[178]1[164]25:[130]D:[153]:[130]X
360 [153]"***********"[199](15)" CLRTHATS ALL FOLKS!WAIT "[199](143)"***********OPEN"
370 [129]X[178]1[164]50:[130]
380 [155]10[171]50